This page documents the data analysis process used to assess selenium in bird egg tissue for bird eggs collected in the Gilbert Bay assessment unit. The applicable criterion for Se in bird eggs for Gilbert Bay is a nesting season geomean of 12.5 mg/kg dry weight (UAC R317-2-14, table 2.14.2). All data used in this assessment are reported as dry weight.
sites=as.data.frame(readxl::read_excel('GSL-egg-Se-DWQ.xls', 'Monitoring Locations'))
names(sites)=gsub(" ", "", names(sites))
names(sites)[names(sites)=='MonitoringLocationID']='MonitoringLocationIdentifier'
results=as.data.frame(readxl::read_excel('GSL-egg-Se-DWQ.xls', 'Results'))
names(results)=gsub(" ", "", names(results))
names(results)[names(results)=='MonitoringLocationID']='MonitoringLocationIdentifier'
wqTools::buildMap(sites=sites) %>% showGroup('Assessment units') %>% leaflet::fitBounds(min(sites$LongitudeMeasure)*0.999, min(sites$LatitudeMeasure)*0.999, max(sites$LongitudeMeasure)*1.001, max(sites$LatitudeMeasure)*1.001)